home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 1999 January - Disc 2 / Macworld (1999-01) (Disk 2).dmg / Serious Demos / Symbolic Composer 4.2 / Environment / System / MRAC / Lengths / Modify / l-syncope < prev    next >
Lisp/Scheme  |  1998-08-11  |  2KB  |  33 lines

  1. l-syncope seed count divide length exclude pattern
  2.  
  3. This function is an extension of the length-syncopate function which simulates the rhythmic effect created by 'choking', a technique widely used by bass guitarists and sax players. By contrast l-syncope add note-length values to the note-length list so changing not only the rhythm but the resultant melodic contour, something length syncopate does not do.
  4.  
  5. In the following examples the length paramter denotes a '1/4 which is divided variously into (1/16 3/16) and (3/16 1/16). The parameter count indicates the number of syncopes to be processed ex. 1 4 suggests between 1 and 4 syncopes may be selected for processing and at random. The parameter divide is set to either to a specific note-length value or to min, max or nil to denotes syncope of the maximum value in the list, the minimum value in he list or a value chosen at random.
  6.  
  7. (setq rhy (qlength '(4-1 8-1 24-110 16-114)))
  8.  
  9. (l-syncope .23 1 4 '1/4 nil rhy)
  10. => (1/16 3/16 1/8 1/24 1/24 -1/24 1/16 1/16 1/4)
  11.  
  12. (l-syncope .23 1 4 'min '1/24 rhy)
  13. => (1/4 1/8 1/24 1/24 -1/24 1/64 3/64 1/16 1/4)
  14.  
  15. (l-syncope nil 1 4 '1/4 nil rhy)
  16. => (3/16 1/16 1/8 1/24 1/24 -1/24 1/16 1/16 1/4)
  17. or (1/4 1/8 1/24 1/24 -1/24 1/16 1/16 3/16 1/16)
  18. or (1/16 3/16 1/8 1/24 1/24 -1/24 1/16 1/16 1/4)
  19. or (1/4 1/8 1/24 1/24 -1/24 1/16 1/16 1/16 3/16)
  20.  
  21. (l-syncope .23 1 4 nil nil rhy)
  22. => (1/4 1/8 1/96 1/32 1/24 -1/24 1/16 1/16 1/4)
  23.  
  24. (l-syncope nil 2 4 nil nil rhy)
  25. => (1/4 1/8 1/32 1/96 1/32 1/96 -1/24 1/16 1/16 1/4)
  26. or (1/4 1/32 3/32 1/24 1/24 -1/24 1/16 1/16 1/4)
  27. or (1/4 1/8 1/24 1/24 -1/24 3/64 1/64 3/64 1/64 1/4) ...
  28.  
  29.  
  30.  
  31.  
  32.  
  33.